/ CU Amiga Super CD-ROM 24 / CU Amiga Magazine's Super CD-ROM 24 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-07].iso / CUCD / Programming / SWI / source / man / xpce.doc

< prev

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 5c 73 65 63 74 69 6f 6e | 7b 54 68 65 20 58 50 43 |\section|{The XPC|
|00000010| 45 20 47 55 49 20 73 79 | 73 74 65 6d 20 66 6f 72 |E GUI sy|stem for|
|00000020| 20 50 72 6f 6c 6f 67 7d | 0a 0a 5c 69 6e 64 65 78 | Prolog}|..\index|
|00000030| 7b 47 55 49 7d 5c 69 6e | 64 65 78 7b 58 50 43 45 |{GUI}\in|dex{XPCE|
|00000040| 7d 5c 69 6e 64 65 78 7b | 47 72 61 70 68 69 63 73 |}\index{|Graphics|
|00000050| 7d 5c 69 6e 64 65 78 7b | 57 69 6e 64 6f 77 20 69 |}\index{|Window i|
|00000060| 6e 74 65 72 66 61 63 65 | 7d 25 0a 5c 69 6e 64 65 |nterface|}%.\inde|
|00000070| 78 7b 58 31 31 7d 25 0a | 54 68 65 20 58 50 43 45 |x{X11}%.|The XPCE|
|00000080| 20 47 55 49 20 73 79 73 | 74 65 6d 20 66 6f 72 20 | GUI sys|tem for |
|00000090| 64 79 6e 61 6d 69 63 61 | 6c 6c 79 20 74 79 70 65 |dynamica|lly type|
|000000a0| 64 20 6c 61 6e 67 75 61 | 67 65 73 20 68 61 73 20 |d langua|ges has |
|000000b0| 62 65 65 6e 20 77 69 74 | 68 0a 53 57 49 2d 50 72 |been wit|h.SWI-Pr|
|000000c0| 6f 6c 6f 67 20 66 6f 72 | 20 61 20 6c 6f 6e 67 20 |olog for| a long |
|000000d0| 74 69 6d 65 2e 20 49 74 | 20 69 73 20 64 65 76 65 |time. It| is deve|
|000000e0| 6c 6f 70 65 64 20 62 79 | 20 41 6e 6a 6f 20 41 6e |loped by| Anjo An|
|000000f0| 6a 65 77 69 65 72 64 65 | 6e 20 61 6e 64 20 4a 61 |jewierde|n and Ja|
|00000100| 6e 0a 57 69 65 6c 65 6d | 61 6b 65 72 20 66 72 6f |n.Wielem|aker fro|
|00000110| 6d 20 74 68 65 20 64 65 | 70 61 72 74 6d 65 6e 74 |m the de|partment|
|00000120| 20 6f 66 20 53 57 49 2c | 20 55 6e 69 76 65 72 73 | of SWI,| Univers|
|00000130| 69 74 79 20 6f 66 20 41 | 6d 73 74 65 72 64 61 6d |ity of A|msterdam|
|00000140| 2e 20 49 74 20 61 69 6d | 73 0a 61 74 20 61 20 68 |. It aim|s.at a h|
|00000150| 69 67 68 2d 70 72 6f 64 | 75 63 74 69 76 65 20 64 |igh-prod|uctive d|
|00000160| 65 76 65 6c 6f 70 6d 65 | 6e 74 20 65 6e 76 69 72 |evelopme|nt envir|
|00000170| 6f 6e 6d 65 6e 74 20 66 | 6f 72 20 67 72 61 70 68 |onment f|or graph|
|00000180| 69 63 61 6c 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |ical app|lication|
|00000190| 73 0a 62 61 73 65 64 20 | 6f 6e 20 50 72 6f 6c 6f |s.based |on Prolo|
|000001a0| 67 2e 0a 0a 4f 62 6a 65 | 63 74 20 6f 72 69 65 6e |g...Obje|ct orien|
|000001b0| 74 65 64 20 74 65 63 68 | 6e 6f 6c 6f 67 79 20 68 |ted tech|nology h|
|000001c0| 61 73 20 70 72 6f 76 65 | 6e 20 74 6f 20 62 65 20 |as prove|n to be |
|000001d0| 61 20 73 75 69 74 61 62 | 6c 65 20 6d 6f 64 65 6c |a suitab|le model|
|000001e0| 20 66 6f 72 0a 69 6d 70 | 6c 65 6d 65 6e 74 69 6e | for.imp|lementin|
|000001f0| 67 20 47 55 49 73 2c 20 | 77 68 69 63 68 20 74 79 |g GUIs, |which ty|
|00000200| 70 69 63 61 6c 6c 79 20 | 64 65 61 6c 20 77 69 74 |pically |deal wit|
|00000210| 68 20 74 68 69 6e 67 73 | 20 50 72 6f 6c 6f 67 20 |h things| Prolog |
|00000220| 69 73 20 6e 6f 74 0a 76 | 65 72 79 20 67 6f 6f 64 |is not.v|ery good|
|00000230| 20 61 74 3a 20 65 76 65 | 6e 74 2d 64 72 69 76 65 | at: eve|nt-drive|
|00000240| 6e 20 63 6f 6e 74 72 6f | 6c 20 61 6e 64 20 67 6c |n contro|l and gl|
|00000250| 6f 62 61 6c 20 73 74 61 | 74 65 2e 20 57 69 74 68 |obal sta|te. With|
|00000260| 20 58 50 43 45 2c 20 77 | 65 0a 64 65 73 69 67 6e | XPCE, w|e.design|
|00000270| 65 64 20 61 20 73 79 73 | 74 65 6d 20 74 68 61 74 |ed a sys|tem that|
|00000280| 20 68 61 73 20 73 69 6d | 69 6c 61 72 20 63 68 61 | has sim|ilar cha|
|00000290| 72 61 63 74 65 72 69 73 | 74 69 63 73 20 74 68 61 |racteris|tics tha|
|000002a0| 74 20 6d 61 6b 65 20 50 | 72 6f 6c 6f 67 0a 73 75 |t make P|rolog.su|
|000002b0| 63 68 20 61 20 70 6f 77 | 65 72 66 75 6c 20 74 6f |ch a pow|erful to|
|000002c0| 6f 6c 3a 20 64 79 6e 61 | 6d 69 63 20 74 79 70 69 |ol: dyna|mic typi|
|000002d0| 6e 67 2c 20 6d 65 74 61 | 2d 70 72 6f 67 72 61 6d |ng, meta|-program|
|000002e0| 6d 69 6e 67 20 61 6e 64 | 20 64 79 6e 61 6d 69 63 |ming and| dynamic|
|000002f0| 0a 6d 6f 64 69 66 69 63 | 61 74 69 6f 6e 20 6f 66 |.modific|ation of|
|00000300| 20 74 68 65 20 72 75 6e | 6e 69 6e 67 20 73 79 73 | the run|ning sys|
|00000310| 74 65 6d 2e 0a 0a 58 50 | 43 45 20 69 73 20 61 6e |tem...XP|CE is an|
|00000320| 20 6f 62 6a 65 63 74 2d | 73 79 73 74 65 6d 20 77 | object-|system w|
|00000330| 72 69 74 74 65 6e 20 69 | 6e 20 74 68 65 20 43 2d |ritten i|n the C-|
|00000340| 6c 61 6e 67 75 61 67 65 | 2e 20 20 49 74 20 70 72 |language|.  It pr|
|00000350| 6f 76 69 64 65 73 20 66 | 6f 72 0a 74 68 65 20 69 |ovides f|or.the i|
|00000360| 6d 70 6c 65 6d 65 6e 74 | 61 74 69 6f 6e 20 6f 66 |mplement|ation of|
|00000370| 20 6d 65 74 68 6f 64 73 | 20 69 6e 20 6d 75 6c 74 | methods| in mult|
|00000380| 69 70 6c 65 20 6c 61 6e | 67 75 61 67 65 73 2e 20 |iple lan|guages. |
|00000390| 4e 65 77 20 58 50 43 45 | 20 63 6c 61 73 73 65 73 |New XPCE| classes|
|000003a0| 0a 6d 61 79 20 62 65 20 | 64 65 66 69 6e 65 64 20 |.may be |defined |
|000003b0| 66 72 6f 6d 20 50 72 6f | 6c 6f 67 20 75 73 69 6e |from Pro|log usin|
|000003c0| 67 20 61 20 73 69 6d 70 | 6c 65 2c 20 6e 61 74 75 |g a simp|le, natu|
|000003d0| 72 61 6c 20 73 79 6e 74 | 61 78 2e 20 20 54 68 65 |ral synt|ax.  The|
|000003e0| 20 62 6f 64 79 20 6f 66 | 0a 74 68 65 20 6d 65 74 | body of|.the met|
|000003f0| 68 6f 64 20 69 73 20 65 | 78 65 63 75 74 65 64 20 |hod is e|xecuted |
|00000400| 62 79 20 50 72 6f 6c 6f | 67 20 69 74 73 65 6c 66 |by Prolo|g itself|
|00000410| 2c 20 70 72 6f 76 69 64 | 69 6e 67 20 61 20 6e 61 |, provid|ing a na|
|00000420| 74 75 72 61 6c 20 69 6e | 74 65 72 66 61 63 65 0a |tural in|terface.|
|00000430| 62 65 74 77 65 65 6e 20 | 74 68 65 20 74 77 6f 20 |between |the two |
|00000440| 73 79 73 74 65 6d 73 2e | 20 20 42 65 6c 6f 77 20 |systems.|  Below |
|00000450| 69 73 20 61 20 76 65 72 | 79 20 73 69 6d 70 6c 65 |is a ver|y simple|
|00000460| 20 63 6c 61 73 73 20 64 | 65 66 69 6e 69 74 69 6f | class d|efinitio|
|00000470| 6e 2e 0a 0a 5c 62 65 67 | 69 6e 7b 63 6f 64 65 7d |n...\beg|in{code}|
|00000480| 0a 3a 2d 20 70 63 65 5f | 62 65 67 69 6e 5f 63 6c |.:- pce_|begin_cl|
|00000490| 61 73 73 28 70 72 6f 6c | 6f 67 5f 6c 69 73 74 65 |ass(prol|og_liste|
|000004a0| 72 2c 20 66 72 61 6d 65 | 2c 0a 09 09 20 20 20 22 |r, frame|,...   "|
|000004b0| 4c 69 73 74 20 50 72 6f | 6c 6f 67 20 70 72 65 64 |List Pro|log pred|
|000004c0| 69 63 61 74 65 73 22 29 | 2e 0a 0a 69 6e 69 74 69 |icates")|...initi|
|000004d0| 61 6c 69 73 65 28 53 65 | 6c 66 29 20 3a 2d 3e 0a |alise(Se|lf) :->.|
|000004e0| 20 20 20 20 20 20 20 20 | 22 41 73 20 74 68 65 20 |        |"As the |
|000004f0| 43 2b 2b 20 63 6f 6e 73 | 74 72 75 63 74 6f 72 22 |C++ cons|tructor"|
|00000500| 3a 3a 0a 20 20 20 20 20 | 20 20 20 73 65 6e 64 28 |::.     |   send(|
|00000510| 53 65 6c 66 2c 20 73 65 | 6e 64 5f 73 75 70 65 72 |Self, se|nd_super|
|00000520| 2c 20 69 6e 69 74 69 61 | 6c 69 73 65 2c 20 27 50 |, initia|lise, 'P|
|00000530| 72 6f 6c 6f 67 20 4c 69 | 73 74 65 72 27 29 2c 0a |rolog Li|ster'),.|
|00000540| 20 20 20 20 20 20 20 20 | 73 65 6e 64 28 53 65 6c |        |send(Sel|
|00000550| 66 2c 20 61 70 70 65 6e | 64 2c 20 6e 65 77 28 44 |f, appen|d, new(D|
|00000560| 2c 20 64 69 61 6c 6f 67 | 29 29 2c 0a 20 20 20 20 |, dialog|)),.    |
|00000570| 20 20 20 20 73 65 6e 64 | 28 44 2c 20 61 70 70 65 |    send|(D, appe|
|00000580| 6e 64 2c 0a 09 20 20 20 | 20 20 74 65 78 74 5f 69 |nd,..   |  text_i|
|00000590| 74 65 6d 28 70 72 65 64 | 69 63 61 74 65 2c 20 6d |tem(pred|icate, m|
|000005a0| 65 73 73 61 67 65 28 53 | 65 6c 66 2c 20 6c 69 73 |essage(S|elf, lis|
|000005b0| 74 2c 20 40 61 72 67 31 | 29 29 29 2c 0a 20 20 20 |t, @arg1|))),.   |
|000005c0| 20 20 20 20 20 73 65 6e | 64 28 6e 65 77 28 76 69 |     sen|d(new(vi|
|000005d0| 65 77 29 2c 20 62 65 6c | 6f 77 2c 20 44 29 2e 0a |ew), bel|ow, D)..|
|000005e0| 0a 6c 69 73 74 28 53 65 | 6c 66 2c 20 46 72 6f 6d |.list(Se|lf, From|
|000005f0| 3a 6e 61 6d 65 29 20 3a | 2d 3e 0a 20 20 20 20 20 |:name) :|->.     |
|00000600| 20 20 20 22 4c 69 73 74 | 20 70 72 65 64 69 63 61 |   "List| predica|
|00000610| 74 65 73 20 66 72 6f 6d | 20 73 70 65 63 69 66 69 |tes from| specifi|
|00000620| 63 61 74 69 6f 6e 22 3a | 3a 0a 20 20 20 20 20 20 |cation":|:.      |
|00000630| 20 20 28 20 20 20 74 65 | 72 6d 5f 74 6f 5f 61 74 |  (   te|rm_to_at|
|00000640| 6f 6d 28 54 65 72 6d 2c | 20 46 72 6f 6d 29 0a 20 |om(Term,| From). |
|00000650| 20 20 20 20 20 20 20 2d | 3e 20 20 67 65 74 28 53 |       -|>  get(S|
|00000660| 65 6c 66 2c 20 6d 65 6d | 62 65 72 2c 20 76 69 65 |elf, mem|ber, vie|
|00000670| 77 2c 20 56 29 2c 0a 20 | 20 20 20 20 20 20 20 20 |w, V),. |        |
|00000680| 20 20 20 70 63 65 5f 6f | 70 65 6e 28 56 2c 20 77 |   pce_o|pen(V, w|
|00000690| 72 69 74 65 2c 20 46 64 | 29 2c 0a 20 20 20 20 20 |rite, Fd|),.     |
|000006a0| 20 20 20 20 20 20 20 73 | 65 74 5f 6f 75 74 70 75 |       s|et_outpu|
|000006b0| 74 28 46 64 29 2c 0a 20 | 20 20 20 20 20 20 20 20 |t(Fd),. |        |
|000006c0| 20 20 20 6c 69 73 74 69 | 6e 67 28 54 65 72 6d 29 |   listi|ng(Term)|
|000006d0| 2c 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 63 6c |,.      |      cl|
|000006e0| 6f 73 65 28 46 64 29 0a | 20 20 20 20 20 20 20 20 |ose(Fd).|        |
|000006f0| 3b 20 20 20 73 65 6e 64 | 28 53 65 6c 66 2c 20 72 |;   send|(Self, r|
|00000700| 65 70 6f 72 74 2c 20 65 | 72 72 6f 72 2c 20 27 53 |eport, e|rror, 'S|
|00000710| 79 6e 74 61 78 20 65 72 | 72 6f 72 27 29 0a 20 20 |yntax er|ror').  |
|00000720| 20 20 20 20 20 20 29 2e | 0a 0a 3a 2d 20 70 63 65 |      ).|..:- pce|
|00000730| 5f 65 6e 64 5f 63 6c 61 | 73 73 2e 0a 0a 74 65 73 |_end_cla|ss...tes|
|00000740| 74 20 3a 2d 20 73 65 6e | 64 28 6e 65 77 28 70 72 |t :- sen|d(new(pr|
|00000750| 6f 6c 6f 67 5f 6c 69 73 | 74 65 72 29 2c 20 6f 70 |olog_lis|ter), op|
|00000760| 65 6e 29 2e 0a 5c 65 6e | 64 7b 63 6f 64 65 7d 0a |en)..\en|d{code}.|
|00000770| 0a 54 68 65 20 31 36 35 | 20 62 75 69 6c 74 2d 69 |.The 165| built-i|
|00000780| 6e 20 63 6c 61 73 73 65 | 73 20 64 65 61 6c 20 77 |n classe|s deal w|
|00000790| 69 74 68 20 74 68 65 20 | 6d 65 74 61 2d 65 6e 76 |ith the |meta-env|
|000007a0| 69 72 6f 6e 6d 65 6e 74 | 2c 0a 64 61 74 61 2d 72 |ironment|,.data-r|
|000007b0| 65 70 72 65 73 65 6e 74 | 61 74 69 6f 6e 20 61 6e |epresent|ation an|
|000007c0| 64 2d 2d 2d 6f 66 20 63 | 6f 75 72 73 65 2d 2d 2d |d---of c|ourse---|
|000007d0| 67 72 61 70 68 69 63 73 | 2e 20 54 68 65 20 67 72 |graphics|. The gr|
|000007e0| 61 70 68 69 63 73 20 63 | 6c 61 73 73 65 73 0a 63 |aphics c|lasses.c|
|000007f0| 6f 6e 63 65 6e 74 72 61 | 74 65 20 6f 6e 20 64 69 |oncentra|te on di|
|00000800| 72 65 63 74 2d 6d 61 6e | 69 70 75 6c 61 74 69 6f |rect-man|ipulatio|
|00000810| 6e 20 6f 66 20 64 69 61 | 67 72 61 6d 6d 61 74 69 |n of dia|grammati|
|00000820| 63 20 72 65 70 72 65 73 | 65 6e 74 61 74 69 6f 6e |c repres|entation|
|00000830| 73 2e 0a 0a 5c 70 61 72 | 61 67 72 61 70 68 7b 41 |s...\par|agraph{A|
|00000840| 76 61 69 6c 61 62 69 6c | 69 74 79 2e 7d 20 58 50 |vailabil|ity.} XP|
|00000850| 43 45 20 72 75 6e 73 20 | 6f 6e 20 6d 6f 73 74 20 |CE runs |on most |
|00000860| 55 6e 69 78 5c 74 6d 7b | 7d 20 70 6c 61 74 66 6f |Unix\tm{|} platfo|
|00000870| 72 6d 73 2c 0a 57 69 6e | 64 6f 77 73 7e 39 35 20 |rms,.Win|dows~95 |
|00000880| 61 6e 64 20 57 69 6e 64 | 6f 77 73 7e 4e 54 2e 20 |and Wind|ows~NT. |
|00000890| 49 74 20 68 61 73 20 62 | 65 65 6e 20 63 6f 6e 6e |It has b|een conn|
|000008a0| 65 63 74 65 64 20 74 6f | 20 53 57 49 2d 50 72 6f |ected to| SWI-Pro|
|000008b0| 6c 6f 67 2c 0a 53 49 43 | 53 74 75 73 5c 74 6d 7b |log,.SIC|Stus\tm{|
|000008c0| 7d 20 61 6e 64 20 51 75 | 69 6e 74 75 73 5c 74 6d |} and Qu|intus\tm|
|000008d0| 7b 7d 20 50 72 6f 6c 6f | 67 20 61 73 20 77 65 6c |{} Prolo|g as wel|
|000008e0| 6c 20 61 73 20 73 6f 6d | 65 20 4c 69 73 70 0a 64 |l as som|e Lisp.d|
|000008f0| 69 61 6c 65 63 74 73 20 | 61 6e 64 20 43 2b 2b 2e |ialects |and C++.|
|00000900| 20 54 68 65 20 51 75 69 | 6e 74 75 73 20 76 65 72 | The Qui|ntus ver|
|00000910| 73 69 6f 6e 20 69 73 20 | 63 6f 6d 6d 65 72 63 69 |sion is |commerci|
|00000920| 61 6c 6c 79 20 64 69 73 | 74 72 69 62 75 74 65 64 |ally dis|tributed|
|00000930| 20 61 6e 64 0a 73 75 70 | 70 6f 72 74 65 64 20 61 | and.sup|ported a|
|00000940| 73 20 50 72 6f 57 69 6e | 64 6f 77 73 2d 33 5c 74 |s ProWin|dows-3\t|
|00000950| 6d 7b 7d 2e 20 0a 0a 5c | 70 61 72 61 67 72 61 70 |m{}. ..\|paragrap|
|00000960| 68 7b 49 6e 66 6f 2e 7d | 20 66 75 72 74 68 65 72 |h{Info.}| further|
|00000970| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 69 73 20 | informa|tion is |
|00000980| 61 76 61 69 6c 61 62 6c | 65 20 66 72 6f 6d 0a 5c |availabl|e from.\|
|00000990| 75 72 6c 7b 68 74 74 70 | 3a 2f 2f 77 77 77 2e 73 |url{http|://www.s|
|000009a0| 77 69 2e 70 73 79 2e 75 | 76 61 2e 6e 6c 2f 70 72 |wi.psy.u|va.nl/pr|
|000009b0| 6f 6a 65 63 74 73 2f 78 | 70 63 65 2f 68 6f 6d 65 |ojects/x|pce/home|
|000009c0| 2e 68 74 6d 6c 7d 20 6f | 72 20 62 79 20 45 2d 6d |.html} o|r by E-m|
|000009d0| 61 69 6c 20 74 6f 0a 5c | 65 6d 61 69 6c 7b 78 70 |ail to.\|email{xp|
|000009e0| 63 65 2d 72 65 71 75 65 | 73 74 40 73 77 69 2e 70 |ce-reque|st@swi.p|
|000009f0| 73 79 2e 75 76 61 2e 6e | 6c 7d 2e 20 54 68 65 72 |sy.uva.n|l}. Ther|
|00000a00| 65 20 69 73 20 61 20 64 | 65 6d 6f 20 76 65 72 73 |e is a d|emo vers|
|00000a10| 69 6f 6e 20 66 6f 72 0a | 57 69 6e 64 6f 77 73 7e |ion for.|Windows~|
|00000a20| 39 35 20 61 6e 64 20 4e | 54 20 69 6e 20 5c 75 72 |95 and N|T in \ur|
|00000a30| 6c 7b 66 74 70 3a 2f 2f | 73 77 69 2e 70 73 79 2e |l{ftp://|swi.psy.|
|00000a40| 75 76 61 2e 6e 6c 2f 70 | 75 62 2f 78 70 63 65 2f |uva.nl/p|ub/xpce/|
|00000a50| 57 69 6e 64 6f 77 73 2f | 62 69 6e 2f 7d 2c 0a 61 |Windows/|bin/},.a|
|00000a60| 6e 64 20 6f 6e 65 20 66 | 6f 72 20 74 68 65 20 69 |nd one f|or the i|
|00000a70| 33 38 36 2f 4c 69 6e 75 | 78 20 73 79 73 74 65 6d |386/Linu|x system|
|00000a80| 20 69 6e 0a 5c 75 72 6c | 7b 66 74 70 3a 2f 2f 73 | in.\url|{ftp://s|
|00000a90| 77 69 2e 70 73 79 2e 75 | 76 61 2e 6e 6c 2f 70 75 |wi.psy.u|va.nl/pu|
|00000aa0| 62 2f 78 70 63 65 2f 6c | 69 6e 75 78 7d 2e 20 46 |b/xpce/l|inux}. F|
|00000ab0| 6f 72 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 6f |or infor|mation o|
|00000ac0| 6e 0a 50 72 6f 57 69 6e | 64 6f 77 73 2d 33 2c 20 |n.ProWin|dows-3, |
|00000ad0| 70 6c 65 61 73 65 20 73 | 65 65 20 5c 75 72 6c 7b |please s|ee \url{|
|00000ae0| 68 74 74 70 3a 2f 2f 77 | 77 77 2e 61 69 69 6c 2e |http://w|ww.aiil.|
|00000af0| 63 6f 2e 75 6b 7d 2c 20 | 6f 72 20 63 6f 6e 74 61 |co.uk}, |or conta|
|00000b00| 63 74 0a 5c 65 6d 61 69 | 6c 7b 73 61 6c 65 73 40 |ct.\emai|l{sales@|
|00000b10| 61 69 69 6c 2e 63 6f 2e | 75 6b 7d 2e 0a          |aiil.co.|uk}..   |
+--------+-------------------------+-------------------------+--------+--------+